home *** CD-ROM | disk | FTP | other *** search
/ Trapped Press Kit / Trapped Press Kit.iso / pc / Trp.dxr / Internal_23_But_Music_Behavior.ls < prev    next >
Encoding:
Text File  |  2002-08-22  |  671 b   |  36 lines
  1. global gMusicVar
  2.  
  3. on mouseWithin me
  4.   if gMusicVar = 1 then
  5.     sprite(99).member = member("MucialOff_RO")
  6.     cursor(280)
  7.   else
  8.     sprite(99).member = member("MucialON_RO")
  9.     cursor(280)
  10.   end if
  11. end
  12.  
  13. on mouseLeave me
  14.   if gMusicVar = 1 then
  15.     sprite(99).member = member("MucialOff")
  16.     cursor(0)
  17.   else
  18.     sprite(99).member = member("MusicON")
  19.     cursor(0)
  20.   end if
  21. end
  22.  
  23. on mouseDown
  24.   sound(3).play(member("click"))
  25.   cursor(0)
  26.   if gMusicVar = 1 then
  27.     gMusicVar = 0
  28.     sound(2).fadeOut(25)
  29.     sprite(99).member = member("MusicON")
  30.   else
  31.     gMusicVar = 1
  32.     sprite(99).member = member("MucialOff")
  33.     sound(2).play(member("Trapped2-2"))
  34.   end if
  35. end
  36.